"! Info:
The block is an extension of the basic context class and encapsulates a chunk of code
Examples:

"
Context subclass: Block [
| argumentLocation creatingContext oldBytePointer |
<category: 'Library-Core'>
"! Info:
Error handler if the block is evaluated with the incorrect number of arguments

Examples:
"
badArgs [
self error: #sysBlkArg
]

"! Info:
Start execution of this block, passing 0 arguments 

Examples:
"
value [
<blockValue self>
(self badArgs)
]

"! Info:
Start execution of this block, passing 1 argument, a.

Examples:
"
value: a [
<blockValue a self>
(self badArgs)
]

"! Info:
Start execution of this block, passing 2 arguments, a and b.

Examples:
"
value: a value: b [
<blockValue a b self>
(self badArgs)
]

"! "
whileFalse: aBlock [
self value ifFalse: [ 
	aBlock value. 
	^ self whileFalse: aBlock 
]
]

"! "
whileTrue: aBlock [
self value ifTrue: [ 
	aBlock value. 
	^ self whileTrue: aBlock 
]
]

]

"! "
MetaContext subclass: MetaBlock [
<category: 'Library-Core'>
]

